CAAVENUSPlanet <-
function(Year){
.Call("VENUSPlanet", Year)
}
